home *** CD-ROM | disk | FTP | other *** search
/ ETO Development Tools 1 / ETO Development Tools 1.iso / Essentials / MacApp Documentation / MacApp AppleLink Messages / MacApp.Tech$ Jul 89 / W0126-TWindow.fIsResizabl-Jul89 < prev    next >
Encoding:
Text File  |  1989-08-22  |  1.5 KB  |  48 lines  |  [TEXT/GEOL]

  1. Item forwarded  by  APPLE.BUGS   to MACDTS
  2.  
  3. Item    0158579                         26-July-89        16:47
  4.  
  5. From:   D0015                           San Diego Levco, Keith Ostrom, PRT
  6.  
  7. To:     APPLE.BUGS                      Apple Bugs Reporting
  8.  
  9. cc:     MACAPP.TECH$MACAPP.TEST         MACAPP Tech
  10.  
  11. Sub:    TWindow.fIsResizable bug
  12.  
  13. Hi all -
  14.  
  15. Just got MacApp 2.0b9. Better.
  16.  
  17. I noted that TWindow now respects fIsResizable, however, the fix is not
  18. correct.  Your fix is to trap out the flag in TWindow.ResizeByUser.
  19.  
  20. The trouble is that TApplication.HandleMouseDown is the place to fix this.  The
  21. reason is that HandleMouseDown calls the (oddly named) FindWindow trap, which
  22. doesn't know that it isn't supposed to return inGrow.  The result is that fixed
  23. sized windows have a dead spot in the lower right corner. I have a fixed
  24. scrapbook-like window with a scroll bar laying across the bottom - the right
  25. arrow is dead.
  26.  
  27. The correct fix is to coerce whereMouseDown from inGrow to inContent before the
  28. main case statement, ie.
  29.  
  30. IF (not aWindow.fIsResizable) and (whereMouseDown=inGrow) then
  31.     whereMouseDown:=inContent;
  32.  
  33. I don't have the source here handy (offsite), so this is the idea if not the
  34. exact wording.
  35.  
  36. (By the way, FindWindow as a trap name always bothered me.  It's either
  37. misnamed - how about WheresDaMouse or WhatGotHit - or it's just a little
  38. overenthusiatic, finding a variety of other things besides windows - just a
  39. comment)
  40.  
  41. Regards --
  42.  
  43. Duane Maxwell
  44. Local MacApp Jockey
  45. Levco
  46.  
  47.  
  48.